/*!	 valuenodedynamiclistrotateorder.cpp
**	 Template File
**
**	Copyright (c) 2002-2005 Robert B. Quattlebaum Jr., Adrian Bentley
**  Copyright (c) 2008 Chris Moore
**
**	This package is free software; you can redistribute it and/or
**	modify it under the terms of the GNU General Public License as
**	published by the Free Software Foundation; either version 2 of
**	the License, or (at your option) any later version.
**
**	This package is distributed in the hope that it will be useful,
**	but WITHOUT ANY WARRANTY; without even the implied warranty of
**	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
**	General Public License for more details.
**
*/

#ifdef USING_PCH
#	include "pch.h"
#else
#ifdef HAVE_CONFIG_H
#	include <config.h>
#endif

#include <synfig/general.h>

#include "valuenodedynamiclistrotateorder.h"
#include <synfigapp/canvasinterface.h>

#include <synfigapp/localization.h>

#endif

using namespace std;
using namespace etl;
using namespace synfig;
using namespace synfigapp;
using namespace Action;

ACTION_INIT(Action::ValueNodeDynamicListRotateOrder);
ACTION_SET_NAME(Action::ValueNodeDynamicListRotateOrder, "ValueNodeDynamicListRotateOrder");
ACTION_SET_LOCAL_NAME(Action::ValueNodeDynamicListRotateOrder, N_("Rotate Order"));
ACTION_SET_TASK(Action::ValueNodeDynamicListRotateOrder, "rotate");
ACTION_SET_CATEGORY(Action::ValueNodeDynamicListRotateOrder, Action::CATEGORY_VALUEDESC | Action::CATEGORY_VALUENODE);
ACTION_SET_PRIORITY(Action::ValueNodeDynamicListRotateOrder, 0);
ACTION_SET_VERSION(Action::ValueNodeDynamicListRotateOrder, "0.0");
ACTION_SET_CVS_ID(Action::ValueNodeDynamicListRotateOrder, "$Id$");

Action::ValueNodeDynamicListRotateOrder::ValueNodeDynamicListRotateOrder()
{
    index = 0;
    set_dirty(true);
}

Action::ParamVocab
Action::ValueNodeDynamicListRotateOrder::get_param_vocab()
{
    ParamVocab ret(Action::CanvasSpecific::get_param_vocab());

    ret.push_back(ParamDesc("value_desc", Param::TYPE_VALUEDESC)
                  .set_local_name(_("ValueDesc"))
                 );

    return ret;
}

bool
Action::ValueNodeDynamicListRotateOrder::is_candidate(const ParamList &x)
{
    if (!candidate_check(get_param_vocab(), x)) {
        return false;
    }

    ValueDesc value_desc(x.find("value_desc")->second.get_value_desc());

    return (value_desc.parent_is_value_node() &&
            // We need a dynamic list.
            ValueNode_DynamicList::Handle::cast_dynamic(value_desc.get_parent_value_node()));
}

bool
Action::ValueNodeDynamicListRotateOrder::set_param(const synfig::String& name, const Action::Param &param)
{
    if (name == "value_desc" && param.get_type() == Param::TYPE_VALUEDESC) {
        ValueDesc value_desc(param.get_value_desc());

        if (!value_desc.parent_is_value_node()) {
            return false;
        }

        value_node = ValueNode_DynamicList::Handle::cast_dynamic(value_desc.get_parent_value_node());

        if (!value_node) {
            return false;
        }

        index = value_desc.get_index();

        return true;
    }

    return Action::CanvasSpecific::set_param(name, param);
}

bool
Action::ValueNodeDynamicListRotateOrder::is_ready()const
{
    if (!value_node) {
        return false;
    }

    return Action::CanvasSpecific::is_ready();
}

void
Action::ValueNodeDynamicListRotateOrder::prepare()
{
    clear();

    for (int i(0); i < (value_node->link_count() - index) % value_node->link_count(); ++i) {
        ValueDesc value_desc(value_node, value_node->link_count() - 1 - i);
        ValueNode::Handle child(value_desc.get_value_node());

        Action::Handle action(Action::create("ValueNodeDynamicListRemove"));

        action->set_param("canvas", get_canvas());
        action->set_param("canvas_interface", get_canvas_interface());
        action->set_param("value_desc", ValueDesc(value_node, value_node->link_count() - 1));

        assert(action->is_ready());

        if (!action->is_ready()) {
            throw Error(Error::TYPE_NOTREADY);
        }

        add_action(action);

        action = Action::create("ValueNodeDynamicListInsert");

        action->set_param("canvas", get_canvas());
        action->set_param("canvas_interface", get_canvas_interface());
        action->set_param("value_desc", ValueDesc(value_node, 0));
        action->set_param("item", child);

        assert(action->is_ready());

        if (!action->is_ready()) {
            throw Error(Error::TYPE_NOTREADY);
        }

        add_action(action);

    }
}